#!/bin/bash

if [[ $# -ne 2 ]]; then
    echo "The format is as follows:"
    echo "bash R-4.1.0.sh buildpath installpath"
    echo ":param buildpath: 应用构建绝对路径"
    echo ":param installpath: 应用安装绝对路径"
    exit 1
fi

[[ ! "$1" =~ ^/.* || ! -d "$1" || "$1" = "/" ]] &&  echo "请输入正确的构建路径" && exit 1
[[ ! "$2" =~ ^/.* || ! -d "$2" || "$2" = "/" ]] &&  echo "请输入正确的安装路径" && exit 1

buildpath=$1
installpath=$2
[[ "$buildpath" =~ .*/$ ]] && buildpath=${buildpath%/*}
[[ "$installpath" =~ .*/$ ]] && installpath=${installpath%/*}
[[ "$buildpath" == "$installpath" ]] && echo "构建路径与安装路径需为不同路径" && exit 1
set -e
yum install -y wget tar environment-modules libatomic

wget -t 10 -c -P $buildpath https://mirror.lzu.edu.cn/CRAN/src/base/R-4/R-4.1.0.tar.gz
tar xf $buildpath/R-4.1.0.tar.gz -C $buildpath && rm -rf $buildpath/R-4.1.0.tar.gz
cd $buildpath/R-4.1.0
./configure --enable-R-shlib --prefix=$installpath/R-4.1.0 CC=clang CXX=clang++
make -j$(nproc)
make install

cat >$installpath/R-4.1.0/R_modulefiles<<EOF
#%Module1.0
conflict R
variable modfile [file normalize [info script]]
proc getModulefileDir {} {
    variable modfile
    set modfile_path [file dirname \$modfile]
    return \$modfile_path
}
set pwd [getModulefileDir]
set R_PATH \$pwd
setenv R_PATH \$R_PATH
prepend-path PATH \$R_PATH/bin
EOF

rm -rf $buildpath/R-4.1.0